home *** CD-ROM | disk | FTP | other *** search
| MacBinary | 1996-08-15 | 5.6 KB | [TEXT/ALFA] |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: MacBinary
(archive/macBinary).
You can browse this item here: calc.tcl
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 10%
| dexvert
| MacBinary (archive/macBinary)
| fallback
| Supported |
| 1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
| 100%
| file
| MacBinary II, Thu Aug 15 12:24:59 1996, modified Thu Aug 15 12:24:59 1996, creator Alpha editor, type ASCII, 5128 bytes "calc.tcl" , at 0x1488 382 bytes resource
| default (weak)
| |
| 99%
| file
| data
| default
| |
| 74%
| TrID
| Macintosh plain text (MacBinary)
| default
| |
| 25%
| TrID
| MacBinary 2
| default (weak)
| |
| 100%
| siegfried
| fmt/1762 MacBinary (II)
| default
| |
| 100%
| lsar
| MacBinary
| default
|
|
| id metadata |
|---|
| key | value |
|---|
| macFileType | [TEXT] |
| macFileCreator | [ALFA] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 08 63 61 6c 63 2e 74 | 63 6c 00 00 00 00 00 00 |..calc.t|cl......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 41 4c 46 | 41 00 00 00 00 00 00 00 |.TEXTALF|A.......|
|00000050| 00 00 00 00 00 14 08 00 | 00 01 7e ae 38 ff db ae |........|..~.8...|
|00000060| 38 ff db 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |8.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 1d 84 00 00 |........|........|
|00000080| 0d 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |.#######|########|
|00000090| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000000a0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000000b0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000000c0| 23 23 23 23 23 23 23 23 | 23 23 23 0d 23 09 09 09 |########|###.#...|
|000000d0| 09 09 09 09 09 09 09 09 | 09 09 09 09 09 09 09 20 |........|....... |
|000000e0| 23 0d 23 09 55 73 65 09 | 61 74 20 79 6f 75 72 09 |#.#.Use.|at your.|
|000000f0| 6f 77 6e 09 72 69 73 6b | 2e 20 54 68 69 73 20 69 |own.risk|. This i|
|00000100| 73 20 6a 75 73 74 20 61 | 20 71 75 69 63 6b 2d 61 |s just a| quick-a|
|00000110| 6e 64 2d 64 69 72 74 79 | 20 52 50 4e 20 73 74 61 |nd-dirty| RPN sta|
|00000120| 63 6b 09 09 20 23 0d 23 | 09 63 61 6c 63 75 6c 61 |ck.. #.#|.calcula|
|00000130| 74 6f 72 2c 09 77 6f 72 | 6b 73 20 6f 6e 20 62 6f |tor,.wor|ks on bo|
|00000140| 74 68 20 64 65 63 69 6d | 61 6c 20 28 73 69 67 6e |th decim|al (sign|
|00000150| 65 64 20 61 6e 64 20 75 | 6e 73 69 67 6e 65 64 29 |ed and u|nsigned)|
|00000160| 2c 20 68 65 78 20 20 20 | 20 20 20 20 20 20 23 0d |, hex | #.|
|00000170| 23 20 09 69 6e 74 65 67 | 65 72 73 2c 20 61 6e 64 |# .integ|ers, and|
|00000180| 20 66 6c 6f 61 74 69 6e | 67 20 70 6f 69 6e 74 2e | floatin|g point.|
|00000190| 20 49 20 70 75 74 20 69 | 74 09 09 09 09 09 09 09 | I put i|t.......|
|000001a0| 09 20 23 0d 23 09 74 6f | 67 65 74 68 65 72 20 66 |. #.#.to|gether f|
|000001b0| 6f 72 20 6d 79 09 6f 77 | 6e 09 75 73 65 2c 20 6e |or my.ow|n.use, n|
|000001c0| 6f 74 20 79 6f 75 72 73 | 2c 09 62 75 74 09 66 65 |ot yours|,.but.fe|
|000001d0| 65 6c 20 66 72 65 65 20 | 74 6f 20 75 73 65 20 69 |el free |to use i|
|000001e0| 74 09 61 73 09 09 20 23 | 0d 23 09 6c 6f 6e 67 20 |t.as.. #|.#.long |
|000001f0| 61 73 09 79 6f 75 09 64 | 6f 6e 27 74 20 63 6f 6d |as.you.d|on't com|
|00000200| 70 6c 61 69 6e 20 61 62 | 6f 75 74 20 77 68 61 74 |plain ab|out what|
|00000210| 20 69 74 20 64 6f 65 73 | 6e 27 74 20 64 6f 2e 20 | it does|n't do. |
|00000220| 49 6d 70 72 6f 76 65 6d | 65 6e 74 73 2c 09 20 23 |Improvem|ents,. #|
|00000230| 0d 23 09 6f 66 20 63 6f | 75 72 73 65 2c 20 61 72 |.#.of co|urse, ar|
|00000240| 65 20 77 65 6c 63 6f 6d | 65 2e 09 09 09 09 09 09 |e welcom|e.......|
|00000250| 09 09 09 09 09 09 20 23 | 0d 23 09 09 09 09 09 09 |...... #|.#......|
|00000260| 09 09 09 09 09 09 09 09 | 09 09 09 09 20 23 0d 23 |........|.... #.#|
|00000270| 09 4f 70 65 72 61 74 69 | 6f 6e 73 3a 09 09 09 09 |.Operati|ons:....|
|00000280| 09 09 09 09 09 09 09 09 | 09 09 09 20 23 0d 23 09 |........|... #.#.|
|00000290| 09 2b 2c 2d 2c 2a 2c 2f | 2c 7c 2c 26 2c 25 09 54 |.+,-,*,/|,|,&,%.T|
|000002a0| 6f 70 09 6f 66 20 73 74 | 61 63 6b 20 69 73 09 27 |op.of st|ack is.'|
|000002b0| 79 27 2c 20 6e 65 78 74 | 20 69 73 20 27 78 27 2e |y', next| is 'x'.|
|000002c0| 20 44 6f 65 73 20 78 20 | 4f 50 09 79 2e 09 20 23 | Does x |OP.y.. #|
|000002d0| 0d 23 09 09 7e 09 09 09 | 09 62 69 74 77 69 73 65 |.#..~...|.bitwise|
|000002e0| 20 4e 4f 54 09 09 09 09 | 09 09 09 09 09 09 20 23 | NOT....|...... #|
|000002f0| 0d 23 09 09 5e 09 09 09 | 09 78 20 65 6f 72 20 79 |.#..^...|.x eor y|
|00000300| 09 09 09 09 09 09 09 09 | 09 09 09 20 23 0d 23 09 |........|... #.#.|
|00000310| 09 3c 09 09 09 09 78 20 | 3c 3c 20 79 09 09 09 09 |.<....x |<< y....|
|00000320| 09 09 09 09 09 09 09 20 | 23 0d 23 09 09 3e 09 09 |....... |#.#..>..|
|00000330| 09 09 78 20 3e 3e 20 79 | 09 09 09 09 09 09 09 09 |..x >> y|........|
|00000340| 09 09 09 20 23 0d 23 09 | 09 63 09 09 09 09 63 68 |... #.#.|.c....ch|
|00000350| 61 6e 67 65 20 79 27 73 | 20 73 69 67 6e 09 09 09 |ange y's| sign...|
|00000360| 09 09 09 09 09 09 20 23 | 0d 23 09 09 71 09 09 09 |...... #|.#..q...|
|00000370| 09 64 75 70 09 79 09 09 | 09 09 09 09 09 09 09 09 |.dup.y..|........|
|00000380| 09 20 23 0d 23 09 09 69 | 09 09 09 09 73 77 61 70 |. #.#..i|....swap|
|00000390| 20 78 20 61 6e 64 20 79 | 09 09 09 09 09 09 09 09 | x and y|........|
|000003a0| 09 20 23 0d 23 09 09 6d | 09 09 09 09 73 77 69 74 |. #.#..m|....swit|
|000003b0| 63 68 20 64 65 63 69 6d | 61 6c 2f 68 65 78 20 6d |ch decim|al/hex m|
|000003c0| 6f 64 65 73 09 09 09 09 | 09 09 20 23 0d 23 09 09 |odes....|.. #.#..|
|000003d0| 78 09 09 09 09 73 68 6f | 77 20 63 75 72 72 65 6e |x....sho|w curren|
|000003e0| 74 20 6d 6f 64 65 09 09 | 09 09 09 09 09 09 20 23 |t mode..|...... #|
|000003f0| 0d 23 09 09 68 2c 3f 09 | 09 09 09 68 65 6c 70 09 |.#..h,?.|...help.|
|00000400| 09 09 09 09 09 09 09 09 | 09 09 20 23 0d 23 09 09 |........|.. #.#..|
|00000410| 3c 64 65 6c 65 74 65 3e | 09 09 70 6f 70 09 73 74 |<delete>|..pop.st|
|00000420| 61 63 6b 09 09 09 09 09 | 09 09 09 09 09 20 23 0d |ack.....|..... #.|
|00000430| 23 09 09 3c 73 70 61 63 | 65 3e 09 09 09 65 6e 74 |#..<spac|e>...ent|
|00000440| 65 72 20 6e 75 6d 62 65 | 72 09 09 09 09 09 09 09 |er numbe|r.......|
|00000450| 09 09 20 23 0d 23 09 09 | 09 09 09 09 09 09 09 09 |.. #.#..|........|
|00000460| 09 09 09 09 09 09 09 09 | 20 23 0d 23 09 54 68 65 |........| #.#.The|
|00000470| 20 6d 6f 64 65 20 69 6e | 64 69 63 61 74 6f 72 20 | mode in|dicator |
|00000480| 69 6e 64 69 63 61 74 65 | 73 20 77 68 65 74 68 65 |indicate|s whethe|
|00000490| 72 20 68 65 78 20 6f 72 | 20 64 65 63 20 69 73 20 |r hex or| dec is |
|000004a0| 61 63 74 69 76 65 2e 20 | 09 09 09 20 23 0d 23 09 |active. |... #.#.|
|000004b0| 41 6c 6c 20 63 61 6c 63 | 75 6c 61 74 69 6f 6e 73 |All calc|ulations|
|000004c0| 20 70 65 72 66 6f 72 6d | 65 64 20 69 6e 20 73 69 | perform|ed in si|
|000004d0| 67 6e 65 64 20 64 65 63 | 69 6d 61 6c 2e 09 09 09 |gned dec|imal....|
|000004e0| 09 09 09 20 23 0d 23 09 | 09 09 09 09 09 09 09 09 |... #.#.|........|
|000004f0| 09 09 09 09 09 09 09 09 | 09 20 23 0d 23 23 23 23 |........|. #.####|
|00000500| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00000510| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00000520| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00000530| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00000540| 23 23 23 23 23 23 0d 0d | 0d 70 72 6f 63 20 63 61 |######..|.proc ca|
|00000550| 6c 63 75 6c 61 74 6f 72 | 20 7b 7d 20 7b 0d 09 67 |lculator| {} {..g|
|00000560| 6c 6f 62 61 6c 20 74 69 | 6c 65 4c 65 66 74 20 74 |lobal ti|leLeft t|
|00000570| 69 6c 65 54 6f 70 0d 09 | 69 66 20 7b 5b 73 65 74 |ileTop..|if {[set|
|00000580| 20 69 6e 64 20 5b 6c 73 | 65 61 72 63 68 20 2d 65 | ind [ls|earch -e|
|00000590| 78 61 63 74 20 5b 77 69 | 6e 4e 61 6d 65 73 5d 20 |xact [wi|nNames] |
|000005a0| 7b 2a 20 43 61 6c 63 20 | 2a 7d 5d 5d 20 3e 3d 20 |{* Calc |*}]] >= |
|000005b0| 30 7d 20 7b 0d 09 09 62 | 72 69 6e 67 54 6f 46 72 |0} {...b|ringToFr|
|000005c0| 6f 6e 74 20 7b 2a 20 43 | 61 6c 63 20 2a 7d 0d 09 |ont {* C|alc *}..|
|000005d0| 09 72 65 74 75 72 6e 0d | 09 7d 0d 09 6e 65 77 20 |.return.|.}..new |
|000005e0| 2d 67 20 24 74 69 6c 65 | 4c 65 66 74 20 24 74 69 |-g $tile|Left $ti|
|000005f0| 6c 65 54 6f 70 20 32 30 | 30 20 32 30 30 20 2d 6e |leTop 20|0 200 -n|
|00000600| 20 7b 2a 20 43 61 6c 63 | 20 2a 7d 0d 09 67 6c 6f | {* Calc| *}..glo|
|00000610| 62 61 6c 20 77 69 6e 4d | 6f 64 65 73 0d 09 73 65 |bal winM|odes..se|
|00000620| 74 20 6e 61 6d 65 20 5b | 6c 69 6e 64 65 78 20 5b |t name [|lindex [|
|00000630| 77 69 6e 4e 61 6d 65 73 | 5d 20 30 5d 0d 09 63 68 |winNames|] 0]..ch|
|00000640| 61 6e 67 65 4d 6f 64 65 | 20 5b 73 65 74 20 77 69 |angeMode| [set wi|
|00000650| 6e 4d 6f 64 65 73 28 24 | 6e 61 6d 65 29 20 43 61 |nModes($|name) Ca|
|00000660| 6c 63 5d 0d 09 63 61 74 | 63 68 20 7b 73 65 74 57 |lc]..cat|ch {setW|
|00000670| 69 6e 49 6e 66 6f 20 2d | 77 20 24 6e 61 6d 65 20 |inInfo -|w $name |
|00000680| 73 68 65 6c 6c 20 31 7d | 0d 7d 0d 0d 0d 6c 61 70 |shell 1}|.}...lap|
|00000690| 70 65 6e 64 20 6d 6f 64 | 65 73 20 43 61 6c 63 0d |pend mod|es Calc.|
|000006a0| 73 65 74 20 6d 6f 64 65 | 73 20 5b 6c 73 6f 72 74 |set mode|s [lsort|
|000006b0| 20 24 6d 6f 64 65 73 5d | 0d 0d 61 73 63 69 69 20 | $modes]|..ascii |
|000006c0| 30 78 32 62 20 22 62 69 | 6e 6f 70 20 2b 22 09 43 |0x2b "bi|nop +".C|
|000006d0| 61 6c 63 0d 61 73 63 69 | 69 20 30 78 32 64 20 22 |alc.asci|i 0x2d "|
|000006e0| 62 69 6e 6f 70 20 2d 22 | 09 43 61 6c 63 0d 61 73 |binop -"|.Calc.as|
|000006f0| 63 69 69 20 30 78 32 61 | 20 22 62 69 6e 6f 70 20 |cii 0x2a| "binop |
|00000700| 2a 22 09 43 61 6c 63 0d | 61 73 63 69 69 20 30 78 |*".Calc.|ascii 0x|
|00000710| 32 66 20 22 62 69 6e 6f | 70 20 2f 22 09 43 61 6c |2f "bino|p /".Cal|
|00000720| 63 0d 61 73 63 69 69 20 | 30 78 37 63 20 22 62 69 |c.ascii |0x7c "bi|
|00000730| 6e 6f 70 20 7c 22 09 43 | 61 6c 63 0d 61 73 63 69 |nop |".C|alc.asci|
|00000740| 69 20 30 78 35 65 20 22 | 62 69 6e 6f 70 20 5e 22 |i 0x5e "|binop ^"|
|00000750| 09 43 61 6c 63 0d 61 73 | 63 69 69 20 30 78 32 36 |.Calc.as|cii 0x26|
|00000760| 20 22 62 69 6e 6f 70 20 | 26 22 09 43 61 6c 63 0d | "binop |&".Calc.|
|00000770| 61 73 63 69 69 20 30 78 | 32 35 20 22 62 69 6e 6f |ascii 0x|25 "bino|
|00000780| 70 20 25 22 09 43 61 6c | 63 0d 61 73 63 69 69 20 |p %".Cal|c.ascii |
|00000790| 30 78 33 65 20 22 62 69 | 6e 6f 70 20 3e 3e 22 09 |0x3e "bi|nop >>".|
|000007a0| 43 61 6c 63 0d 61 73 63 | 69 69 20 30 78 33 63 20 |Calc.asc|ii 0x3c |
|000007b0| 22 62 69 6e 6f 70 20 3c | 3c 22 09 43 61 6c 63 0d |"binop <|<".Calc.|
|000007c0| 61 73 63 69 69 20 30 78 | 37 65 20 22 75 6e 61 72 |ascii 0x|7e "unar|
|000007d0| 79 6f 70 20 7e 22 20 09 | 43 61 6c 63 0d 61 73 63 |yop ~" .|Calc.asc|
|000007e0| 69 69 20 30 78 36 33 20 | 22 75 6e 61 72 79 6f 70 |ii 0x63 |"unaryop|
|000007f0| 20 2d 22 09 43 61 6c 63 | 0d 61 73 63 69 69 20 30 | -".Calc|.ascii 0|
|00000800| 78 33 66 20 22 65 64 69 | 74 4d 61 72 6b 20 5c 22 |x3f "edi|tMark \"|
|00000810| 24 48 4f 4d 45 3a 48 65 | 6c 70 3a 4d 61 6e 75 61 |$HOME:He|lp:Manua|
|00000820| 6c 5c 22 20 43 61 6c 63 | 75 6c 61 74 6f 72 20 2d |l\" Calc|ulator -|
|00000830| 72 22 20 43 61 6c 63 0d | 61 73 63 69 69 20 30 78 |r" Calc.|ascii 0x|
|00000840| 36 38 20 22 65 64 69 74 | 4d 61 72 6b 20 5c 22 24 |68 "edit|Mark \"$|
|00000850| 48 4f 4d 45 3a 48 65 6c | 70 3a 4d 61 6e 75 61 6c |HOME:Hel|p:Manual|
|00000860| 5c 22 20 43 61 6c 63 75 | 6c 61 74 6f 72 20 2d 72 |\" Calcu|lator -r|
|00000870| 22 20 43 61 6c 63 0d 61 | 73 63 69 69 20 30 78 37 |" Calc.a|scii 0x7|
|00000880| 31 20 63 61 6c 63 44 75 | 70 09 09 43 61 6c 63 0d |1 calcDu|p..Calc.|
|00000890| 61 73 63 69 69 20 30 78 | 36 39 20 63 61 6c 63 45 |ascii 0x|69 calcE|
|000008a0| 78 09 09 43 61 6c 63 0d | 61 73 63 69 69 20 30 78 |x..Calc.|ascii 0x|
|000008b0| 36 64 20 63 68 61 6e 67 | 65 43 61 6c 63 4d 6f 64 |6d chang|eCalcMod|
|000008c0| 65 09 43 61 6c 63 0d 61 | 73 63 69 69 20 30 78 37 |e.Calc.a|scii 0x7|
|000008d0| 38 20 22 63 61 6c 63 53 | 68 6f 77 22 09 43 61 6c |8 "calcS|how".Cal|
|000008e0| 63 0d 61 73 63 69 69 20 | 30 78 32 30 20 63 61 6c |c.ascii |0x20 cal|
|000008f0| 63 45 6e 74 65 72 09 43 | 61 6c 63 0d 61 73 63 69 |cEnter.C|alc.asci|
|00000900| 69 20 30 78 30 38 20 63 | 61 6c 63 44 65 6c 09 09 |i 0x08 c|alcDel..|
|00000910| 43 61 6c 63 0d 0d 73 65 | 74 20 63 61 6c 63 4d 6f |Calc..se|t calcMo|
|00000920| 64 65 20 33 0d 0d 70 72 | 6f 63 20 63 68 61 6e 67 |de 3..pr|oc chang|
|00000930| 65 43 61 6c 63 4d 6f 64 | 65 20 7b 7d 20 7b 0d 09 |eCalcMod|e {} {..|
|00000940| 67 6c 6f 62 61 6c 20 63 | 61 6c 63 4d 6f 64 65 0d |global c|alcMode.|
|00000950| 09 0d 09 67 6f 74 6f 20 | 5b 6d 61 78 50 6f 73 5d |...goto |[maxPos]|
|00000960| 0d 09 69 66 20 7b 5b 67 | 65 74 50 6f 73 5d 7d 20 |..if {[g|etPos]} |
|00000970| 7b 0d 09 09 69 66 20 7b | 5b 6c 6f 6f 6b 41 74 20 |{...if {|[lookAt |
|00000980| 5b 65 78 70 72 20 5b 67 | 65 74 50 6f 73 5d 20 2d |[expr [g|etPos] -|
|00000990| 20 31 5d 5d 20 21 3d 20 | 22 5c 72 22 7d 20 63 61 | 1]] != |"\r"} ca|
|000009a0| 6c 63 45 6e 74 65 72 0d | 09 09 73 65 74 20 6e 75 |lcEnter.|..set nu|
|000009b0| 6d 73 20 7b 7d 0d 09 09 | 73 65 74 20 74 20 22 22 |ms {}...|set t ""|
|000009c0| 0d 09 09 66 6f 72 65 61 | 63 68 20 6e 20 5b 73 70 |...forea|ch n [sp|
|000009d0| 6c 69 74 20 5b 67 65 74 | 54 65 78 74 20 30 20 5b |lit [get|Text 0 [|
|000009e0| 65 78 70 72 20 5b 6d 61 | 78 50 6f 73 5d 20 2d 20 |expr [ma|xPos] - |
|000009f0| 31 5d 5d 20 22 5c 72 22 | 5d 20 7b 0d 09 09 09 6c |1]] "\r"|] {....l|
|00000a00| 61 70 70 65 6e 64 20 6e | 75 6d 73 20 5b 63 61 6c |append n|ums [cal|
|00000a10| 63 47 65 74 20 24 6e 5d | 0d 09 09 7d 0d 09 09 73 |cGet $n]|...}...s|
|00000a20| 65 74 20 63 61 6c 63 4d | 6f 64 65 20 5b 65 78 70 |et calcM|ode [exp|
|00000a30| 72 20 28 24 63 61 6c 63 | 4d 6f 64 65 20 2b 20 31 |r ($calc|Mode + 1|
|00000a40| 29 20 25 20 34 5d 0d 09 | 09 66 6f 72 65 61 63 68 |) % 4]..|.foreach|
|00000a50| 20 6e 20 24 6e 75 6d 73 | 20 7b 0d 09 09 09 61 70 | n $nums| {....ap|
|00000a60| 70 65 6e 64 20 74 20 22 | 5b 63 61 6c 63 50 75 74 |pend t "|[calcPut|
|00000a70| 20 24 6e 5d 5c 72 22 0d | 09 09 7d 0d 09 09 72 65 | $n]\r".|..}...re|
|00000a80| 70 6c 61 63 65 54 65 78 | 74 20 30 20 5b 6d 61 78 |placeTex|t 0 [max|
|00000a90| 50 6f 73 5d 20 24 74 0d | 09 7d 20 65 6c 73 65 20 |Pos] $t.|.} else |
|00000aa0| 7b 0d 09 09 73 65 74 20 | 63 61 6c 63 4d 6f 64 65 |{...set |calcMode|
|00000ab0| 20 5b 65 78 70 72 20 28 | 24 63 61 6c 63 4d 6f 64 | [expr (|$calcMod|
|00000ac0| 65 20 2b 20 31 29 20 25 | 20 34 5d 0d 09 7d 0d 09 |e + 1) %| 4]..}..|
|00000ad0| 73 77 69 74 63 68 20 22 | 24 63 61 6c 63 4d 6f 64 |switch "|$calcMod|
|00000ae0| 65 22 20 7b 0d 09 09 30 | 20 09 7b 6d 65 73 73 61 |e" {...0| .{messa|
|00000af0| 67 65 20 22 53 69 67 6e | 65 64 20 64 65 63 69 6d |ge "Sign|ed decim|
|00000b00| 61 6c 22 20 7d 0d 09 09 | 31 20 09 7b 6d 65 73 73 |al" }...|1 .{mess|
|00000b10| 61 67 65 20 22 55 6e 73 | 69 67 6e 65 64 20 64 65 |age "Uns|igned de|
|00000b20| 63 69 6d 61 6c 22 7d 0d | 09 09 32 20 09 7b 6d 65 |cimal"}.|..2 .{me|
|00000b30| 73 73 61 67 65 20 22 55 | 6e 73 69 67 6e 65 64 20 |ssage "U|nsigned |
|00000b40| 68 65 78 61 64 65 63 69 | 6d 61 6c 22 7d 0d 09 09 |hexadeci|mal"}...|
|00000b50| 33 20 09 7b 6d 65 73 73 | 61 67 65 20 22 46 6c 6f |3 .{mess|age "Flo|
|00000b60| 61 74 69 6e 67 20 50 6f | 69 6e 74 22 7d 0d 09 7d |ating Po|int"}..}|
|00000b70| 0d 7d 0d 0d 0d 70 72 6f | 63 20 63 61 6c 63 53 68 |.}...pro|c calcSh|
|00000b80| 6f 77 20 7b 7d 20 7b 0d | 09 67 6c 6f 62 61 6c 20 |ow {} {.|.global |
|00000b90| 63 61 6c 63 4d 6f 64 65 | 0d 09 73 77 69 74 63 68 |calcMode|..switch|
|00000ba0| 20 22 24 63 61 6c 63 4d | 6f 64 65 22 20 7b 0d 09 | "$calcM|ode" {..|
|00000bb0| 09 30 20 09 7b 6d 65 73 | 73 61 67 65 20 22 53 69 |.0 .{mes|sage "Si|
|00000bc0| 67 6e 65 64 20 64 65 63 | 69 6d 61 6c 22 20 7d 0d |gned dec|imal" }.|
|00000bd0| 09 09 31 20 09 7b 6d 65 | 73 73 61 67 65 20 22 55 |..1 .{me|ssage "U|
|00000be0| 6e 73 69 67 6e 65 64 20 | 64 65 63 69 6d 61 6c 22 |nsigned |decimal"|
|00000bf0| 7d 0d 09 09 32 20 09 7b | 6d 65 73 73 61 67 65 20 |}...2 .{|message |
|00000c00| 22 55 6e 73 69 67 6e 65 | 64 20 68 65 78 61 64 65 |"Unsigne|d hexade|
|00000c10| 63 69 6d 61 6c 22 7d 0d | 09 09 33 20 09 7b 6d 65 |cimal"}.|..3 .{me|
|00000c20| 73 73 61 67 65 20 22 46 | 6c 6f 61 74 69 6e 67 20 |ssage "F|loating |
|00000c30| 50 6f 69 6e 74 22 7d 0d | 09 7d 0d 7d 0d 0d 0d 70 |Point"}.|.}.}...p|
|00000c40| 72 6f 63 20 63 61 6c 63 | 47 65 74 20 7b 69 6e 7d |roc calc|Get {in}|
|00000c50| 20 7b 0d 09 67 6c 6f 62 | 61 6c 20 63 61 6c 63 4d | {..glob|al calcM|
|00000c60| 6f 64 65 0d 0d 09 73 77 | 69 74 63 68 20 22 24 63 |ode...sw|itch "$c|
|00000c70| 61 6c 63 4d 6f 64 65 22 | 20 7b 0d 09 09 30 09 7b |alcMode"| {...0.{|
|00000c80| 73 63 61 6e 20 24 69 6e | 20 22 25 64 22 20 6e 75 |scan $in| "%d" nu|
|00000c90| 6d 3b 20 72 65 74 75 72 | 6e 20 24 6e 75 6d 7d 0d |m; retur|n $num}.|
|00000ca0| 09 09 31 09 7b 73 63 61 | 6e 20 24 69 6e 20 22 25 |..1.{sca|n $in "%|
|00000cb0| 75 22 20 6e 75 6d 3b 20 | 72 65 74 75 72 6e 20 24 |u" num; |return $|
|00000cc0| 6e 75 6d 7d 0d 09 09 32 | 09 7b 73 63 61 6e 20 24 |num}...2|.{scan $|
|00000cd0| 69 6e 20 22 25 78 22 20 | 6e 75 6d 3b 20 72 65 74 |in "%x" |num; ret|
|00000ce0| 75 72 6e 20 24 6e 75 6d | 7d 0d 09 09 33 09 7b 73 |urn $num|}...3.{s|
|00000cf0| 63 61 6e 20 24 69 6e 20 | 22 25 66 22 20 6e 75 6d |can $in |"%f" num|
|00000d00| 3b 20 72 65 74 75 72 6e | 20 24 6e 75 6d 7d 0d 09 |; return| $num}..|
|00000d10| 7d 0d 09 65 72 72 6f 72 | 20 22 42 61 64 20 68 65 |}..error| "Bad he|
|00000d20| 78 20 6e 75 6d 20 27 24 | 69 6e 27 22 0d 7d 0d 0d |x num '$|in'".}..|
|00000d30| 0d 70 72 6f 63 20 63 61 | 6c 63 50 75 74 20 7b 69 |.proc ca|lcPut {i|
|00000d40| 6e 7d 20 7b 0d 09 67 6c | 6f 62 61 6c 20 63 61 6c |n} {..gl|obal cal|
|00000d50| 63 4d 6f 64 65 0d 0d 09 | 69 66 20 7b 24 63 61 6c |cMode...|if {$cal|
|00000d60| 63 4d 6f 64 65 20 21 3d | 20 33 7d 20 7b 0d 09 09 |cMode !=| 3} {...|
|00000d70| 72 65 67 65 78 70 20 7b | 5b 30 2d 39 2d 5d 2b 7d |regexp {|[0-9-]+}|
|00000d80| 20 24 69 6e 20 69 6e 0d | 09 7d 0d 09 73 77 69 74 | $in in.|.}..swit|
|00000d90| 63 68 20 24 63 61 6c 63 | 4d 6f 64 65 20 7b 0d 09 |ch $calc|Mode {..|
|00000da0| 09 30 20 09 09 7b 72 65 | 74 75 72 6e 20 5b 66 6f |.0 ..{re|turn [fo|
|00000db0| 72 6d 61 74 20 22 25 31 | 30 64 22 20 24 69 6e 5d |rmat "%1|0d" $in]|
|00000dc0| 7d 0d 09 09 31 20 09 09 | 7b 72 65 74 75 72 6e 20 |}...1 ..|{return |
|00000dd0| 5b 66 6f 72 6d 61 74 20 | 22 25 31 30 75 22 20 24 |[format |"%10u" $|
|00000de0| 69 6e 5d 7d 0d 09 09 32 | 20 09 09 7b 72 65 74 75 |in]}...2| ..{retu|
|00000df0| 72 6e 20 5b 66 6f 72 6d | 61 74 20 22 25 31 30 78 |rn [form|at "%10x|
|00000e00| 22 20 24 69 6e 5d 7d 0d | 09 09 33 20 09 09 7b 72 |" $in]}.|..3 ..{r|
|00000e10| 65 74 75 72 6e 20 5b 66 | 6f 72 6d 61 74 20 22 25 |eturn [f|ormat "%|
|00000e20| 31 37 2e 36 66 22 20 24 | 69 6e 5d 7d 0d 09 7d 0d |17.6f" $|in]}..}.|
|00000e30| 7d 0d 0d 09 09 0d 70 72 | 6f 63 20 62 69 6e 6f 70 |}.....pr|oc binop|
|00000e40| 20 7b 6f 70 7d 20 7b 0d | 09 67 6c 6f 62 61 6c 20 | {op} {.|.global |
|00000e50| 63 61 6c 63 4d 6f 64 65 | 0d 09 67 6f 74 6f 20 5b |calcMode|..goto [|
|00000e60| 6d 61 78 50 6f 73 5d 0d | 09 69 66 20 7b 5b 6c 6f |maxPos].|.if {[lo|
|00000e70| 6f 6b 41 74 20 5b 65 78 | 70 72 20 5b 67 65 74 50 |okAt [ex|pr [getP|
|00000e80| 6f 73 5d 20 2d 20 31 5d | 5d 20 21 3d 20 22 5c 72 |os] - 1]|] != "\r|
|00000e90| 22 7d 20 63 61 6c 63 45 | 6e 74 65 72 0d 09 73 65 |"} calcE|nter..se|
|00000ea0| 74 20 70 6f 73 20 5b 6c | 69 6e 65 53 74 61 72 74 |t pos [l|ineStart|
|00000eb0| 20 5b 67 65 74 50 6f 73 | 5d 5d 0d 09 73 65 74 20 | [getPos|]]..set |
|00000ec0| 73 74 5f 79 20 5b 6c 69 | 6e 65 53 74 61 72 74 20 |st_y [li|neStart |
|00000ed0| 5b 65 78 70 72 20 24 70 | 6f 73 20 2d 20 31 5d 5d |[expr $p|os - 1]]|
|00000ee0| 0d 09 73 65 74 20 73 74 | 5f 78 20 5b 6c 69 6e 65 |..set st|_x [line|
|00000ef0| 53 74 61 72 74 20 5b 65 | 78 70 72 20 24 73 74 5f |Start [e|xpr $st_|
|00000f00| 79 20 2d 20 31 5d 5d 0d | 09 69 66 20 7b 24 73 74 |y - 1]].|.if {$st|
|00000f10| 5f 79 20 3d 3d 20 24 73 | 74 5f 78 7d 20 7b 20 62 |_y == $s|t_x} { b|
|00000f20| 65 65 70 3b 20 72 65 74 | 75 72 6e 7d 0d 09 73 65 |eep; ret|urn}..se|
|00000f30| 74 20 72 65 73 20 5b 65 | 76 61 6c 20 65 78 70 72 |t res [e|val expr|
|00000f40| 20 5b 63 61 6c 63 47 65 | 74 20 5b 67 65 74 54 65 | [calcGe|t [getTe|
|00000f50| 78 74 20 24 73 74 5f 78 | 20 24 73 74 5f 79 5d 5d |xt $st_x| $st_y]]|
|00000f60| 20 24 6f 70 20 5b 63 61 | 6c 63 47 65 74 20 5b 67 | $op [ca|lcGet [g|
|00000f70| 65 74 54 65 78 74 20 24 | 73 74 5f 79 20 24 70 6f |etText $|st_y $po|
|00000f80| 73 5d 5d 5d 0d 09 72 65 | 70 6c 61 63 65 54 65 78 |s]]]..re|placeTex|
|00000f90| 74 20 24 73 74 5f 78 20 | 5b 6d 61 78 50 6f 73 5d |t $st_x |[maxPos]|
|00000fa0| 20 22 5b 63 61 6c 63 50 | 75 74 20 24 72 65 73 5d | "[calcP|ut $res]|
|00000fb0| 5c 72 22 0d 7d 0d 0d 0d | 70 72 6f 63 20 75 6e 61 |\r".}...|proc una|
|00000fc0| 72 79 6f 70 20 7b 6f 70 | 7d 20 7b 0d 09 67 6f 74 |ryop {op|} {..got|
|00000fd0| 6f 20 5b 6d 61 78 50 6f | 73 5d 0d 09 0d 09 73 65 |o [maxPo|s]....se|
|00000fe0| 74 20 70 6f 73 20 5b 67 | 65 74 50 6f 73 5d 0d 09 |t pos [g|etPos]..|
|00000ff0| 73 65 74 20 6c 61 73 74 | 20 5b 6c 69 6e 65 53 74 |set last| [lineSt|
|00001000| 61 72 74 20 5b 65 78 70 | 72 20 5b 67 65 74 50 6f |art [exp|r [getPo|
|00001010| 73 5d 20 2d 20 31 5d 5d | 0d 09 72 65 70 6c 61 63 |s] - 1]]|..replac|
|00001020| 65 54 65 78 74 20 24 6c | 61 73 74 20 24 70 6f 73 |eText $l|ast $pos|
|00001030| 20 5b 65 78 70 72 20 22 | 5b 63 61 6c 63 50 75 74 | [expr "|[calcPut|
|00001040| 20 24 6f 70 5b 63 61 6c | 63 47 65 74 20 5b 67 65 | $op[cal|cGet [ge|
|00001050| 74 54 65 78 74 20 24 6c | 61 73 74 20 24 70 6f 73 |tText $l|ast $pos|
|00001060| 5d 5d 5d 22 5d 20 22 5c | 72 22 0d 7d 0d 0d 0d 70 |]]]"] "\|r".}...p|
|00001070| 72 6f 63 20 63 61 6c 63 | 45 78 20 7b 7d 20 7b 0d |roc calc|Ex {} {.|
|00001080| 09 67 6f 74 6f 20 5b 6d | 61 78 50 6f 73 5d 0d 09 |.goto [m|axPos]..|
|00001090| 69 66 20 7b 5b 6c 6f 6f | 6b 41 74 20 5b 65 78 70 |if {[loo|kAt [exp|
|000010a0| 72 20 5b 67 65 74 50 6f | 73 5d 20 2d 20 31 5d 5d |r [getPo|s] - 1]]|
|000010b0| 20 21 3d 20 22 5c 72 22 | 7d 20 63 61 6c 63 45 6e | != "\r"|} calcEn|
|000010c0| 74 65 72 0d 09 73 65 74 | 20 70 6f 73 20 5b 6c 69 |ter..set| pos [li|
|000010d0| 6e 65 53 74 61 72 74 20 | 5b 67 65 74 50 6f 73 5d |neStart |[getPos]|
|000010e0| 5d 0d 09 73 65 74 20 73 | 74 5f 79 20 5b 6c 69 6e |]..set s|t_y [lin|
|000010f0| 65 53 74 61 72 74 20 5b | 65 78 70 72 20 24 70 6f |eStart [|expr $po|
|00001100| 73 20 2d 20 31 5d 5d 0d | 09 73 65 74 20 73 74 5f |s - 1]].|.set st_|
|00001110| 78 20 5b 6c 69 6e 65 53 | 74 61 72 74 20 5b 65 78 |x [lineS|tart [ex|
|00001120| 70 72 20 24 73 74 5f 79 | 20 2d 20 31 5d 5d 0d 09 |pr $st_y| - 1]]..|
|00001130| 69 66 20 7b 24 73 74 5f | 79 20 3d 3d 20 24 73 74 |if {$st_|y == $st|
|00001140| 5f 78 7d 20 7b 20 62 65 | 65 70 3b 20 72 65 74 75 |_x} { be|ep; retu|
|00001150| 72 6e 7d 0d 09 72 65 70 | 6c 61 63 65 54 65 78 74 |rn}..rep|laceText|
|00001160| 20 24 73 74 5f 78 20 5b | 6d 61 78 50 6f 73 5d 20 | $st_x [|maxPos] |
|00001170| 22 5b 67 65 74 54 65 78 | 74 20 24 73 74 5f 79 20 |"[getTex|t $st_y |
|00001180| 24 70 6f 73 5d 5b 67 65 | 74 54 65 78 74 20 24 73 |$pos][ge|tText $s|
|00001190| 74 5f 78 20 24 73 74 5f | 79 5d 22 0d 7d 0d 0d 0d |t_x $st_|y]".}...|
|000011a0| 70 72 6f 63 20 63 61 6c | 63 45 6e 74 65 72 20 7b |proc cal|cEnter {|
|000011b0| 7d 20 7b 0d 09 67 6c 6f | 62 61 6c 20 63 61 6c 63 |} {..glo|bal calc|
|000011c0| 4d 6f 64 65 0d 09 67 6f | 74 6f 20 5b 6d 61 78 50 |Mode..go|to [maxP|
|000011d0| 6f 73 5d 0d 09 73 77 69 | 74 63 68 20 22 24 63 61 |os]..swi|tch "$ca|
|000011e0| 6c 63 4d 6f 64 65 22 20 | 7b 0d 09 09 30 20 09 7b |lcMode" |{...0 .{|
|000011f0| 73 65 74 20 65 78 20 7b | 5b 30 2d 39 2d 5d 2b 24 |set ex {|[0-9-]+$|
|00001200| 7d 7d 0d 09 09 31 20 09 | 7b 73 65 74 20 65 78 20 |}}...1 .|{set ex |
|00001210| 7b 5b 30 2d 39 5d 2b 24 | 7d 7d 0d 09 09 32 20 09 |{[0-9]+$|}}...2 .|
|00001220| 7b 73 65 74 20 65 78 20 | 7b 5b 30 2d 39 61 2d 66 |{set ex |{[0-9a-f|
|00001230| 5d 2b 24 7d 7d 0d 09 09 | 33 20 09 7b 73 65 74 20 |]+$}}...|3 .{set |
|00001240| 65 78 20 7b 5b 30 2d 39 | 2e 2d 5d 2b 24 7d 7d 0d |ex {[0-9|.-]+$}}.|
|00001250| 09 7d 20 0d 09 69 66 20 | 7b 5b 72 65 67 65 78 70 |.} ..if |{[regexp|
|00001260| 20 24 65 78 20 5b 67 65 | 74 54 65 78 74 20 5b 6c | $ex [ge|tText [l|
|00001270| 69 6e 65 53 74 61 72 74 | 20 5b 67 65 74 50 6f 73 |ineStart| [getPos|
|00001280| 5d 5d 20 5b 67 65 74 50 | 6f 73 5d 5d 20 6e 75 6d |]] [getP|os]] num|
|00001290| 5d 7d 20 7b 0d 09 09 73 | 65 74 20 6e 75 6d 20 5b |]} {...s|et num [|
|000012a0| 63 61 6c 63 47 65 74 20 | 24 6e 75 6d 5d 0d 09 09 |calcGet |$num]...|
|000012b0| 72 65 70 6c 61 63 65 54 | 65 78 74 20 5b 6c 69 6e |replaceT|ext [lin|
|000012c0| 65 53 74 61 72 74 20 5b | 67 65 74 50 6f 73 5d 5d |eStart [|getPos]]|
|000012d0| 20 5b 67 65 74 50 6f 73 | 5d 20 5b 63 61 6c 63 50 | [getPos|] [calcP|
|000012e0| 75 74 20 24 6e 75 6d 5d | 20 22 5c 72 22 0d 09 7d |ut $num]| "\r"..}|
|000012f0| 20 65 6c 73 65 20 7b 0d | 09 09 62 65 65 70 0d 09 | else {.|..beep..|
|00001300| 09 62 65 67 69 6e 6e 69 | 6e 67 4f 66 4c 69 6e 65 |.beginni|ngOfLine|
|00001310| 0d 09 09 6b 69 6c 6c 4c | 69 6e 65 0d 09 7d 0d 7d |...killL|ine..}.}|
|00001320| 0d 0d 70 72 6f 63 20 63 | 61 6c 63 44 65 6c 20 7b |..proc c|alcDel {|
|00001330| 7d 20 7b 0d 09 67 6f 74 | 6f 20 5b 6d 61 78 50 6f |} {..got|o [maxPo|
|00001340| 73 5d 0d 09 69 66 20 7b | 5b 6c 6f 6f 6b 41 74 20 |s]..if {|[lookAt |
|00001350| 5b 65 78 70 72 20 5b 67 | 65 74 50 6f 73 5d 20 2d |[expr [g|etPos] -|
|00001360| 20 31 5d 5d 20 3d 3d 20 | 22 5c 72 22 7d 20 7b 0d | 1]] == |"\r"} {.|
|00001370| 09 09 64 65 6c 65 74 65 | 54 65 78 74 20 5b 6c 69 |..delete|Text [li|
|00001380| 6e 65 53 74 61 72 74 20 | 5b 65 78 70 72 20 5b 67 |neStart |[expr [g|
|00001390| 65 74 50 6f 73 5d 20 2d | 20 31 5d 5d 20 5b 67 65 |etPos] -| 1]] [ge|
|000013a0| 74 50 6f 73 5d 0d 09 7d | 20 65 6c 73 65 20 7b 0d |tPos]..}| else {.|
|000013b0| 09 09 62 61 63 6b 53 70 | 61 63 65 0d 09 7d 0d 7d |..backSp|ace..}.}|
|000013c0| 0d 0d 70 72 6f 63 20 63 | 61 6c 63 44 75 70 20 7b |..proc c|alcDup {|
|000013d0| 7d 20 7b 0d 09 67 6f 74 | 6f 20 5b 6d 61 78 50 6f |} {..got|o [maxPo|
|000013e0| 73 5d 0d 09 69 66 20 7b | 5b 6c 6f 6f 6b 41 74 20 |s]..if {|[lookAt |
|000013f0| 5b 65 78 70 72 20 5b 67 | 65 74 50 6f 73 5d 20 2d |[expr [g|etPos] -|
|00001400| 20 31 5d 5d 20 21 3d 20 | 22 5c 72 22 7d 20 63 61 | 1]] != |"\r"} ca|
|00001410| 6c 63 45 6e 74 65 72 0d | 09 73 65 74 20 74 6f 20 |lcEnter.|.set to |
|00001420| 5b 6c 69 6e 65 53 74 61 | 72 74 20 5b 67 65 74 50 |[lineSta|rt [getP|
|00001430| 6f 73 5d 5d 0d 09 73 65 | 74 20 66 72 6f 6d 20 5b |os]]..se|t from [|
|00001440| 6c 69 6e 65 53 74 61 72 | 74 20 5b 65 78 70 72 20 |lineStar|t [expr |
|00001450| 24 74 6f 20 2d 20 31 5d | 5d 0d 09 73 65 74 20 74 |$to - 1]|]..set t|
|00001460| 20 5b 67 65 74 54 65 78 | 74 20 24 66 72 6f 6d 20 | [getTex|t $from |
|00001470| 24 74 6f 5d 0d 09 69 6e | 73 65 72 74 54 65 78 74 |$to]..in|sertText|
|00001480| 20 24 74 0d 7d 0d 0d 0d | 00 00 00 00 00 00 00 00 | $t.}...|........|
|00001490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001500| 00 00 01 00 00 00 01 4c | 00 00 00 4c 00 00 00 32 |.......L|...L...2|
|00001510| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001520| 20 20 20 20 7c 0d 20 20 | 20 20 20 72 65 74 75 72 | |. | retur|
|00001530| 08 63 61 6c 63 2e 74 63 | 6c 6c 02 00 00 00 54 45 |.calc.tc|ll....TE|
|00001540| 58 54 41 4c 46 41 00 00 | 63 c0 63 c0 00 00 00 00 |XTALFA..|c.c.....|
|00001550| 00 00 54 45 58 54 41 4c | 46 41 00 00 63 c0 63 c0 |..TEXTAL|FA..c.c.|
|00001560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001570| 00 00 ad 3a 2b 55 00 00 | 14 08 00 00 01 7e 20 64 |...:+U..|.....~ d|
|00001580| 65 74 65 72 6d 69 6e 65 | 73 20 20 74 68 65 20 20 |etermine|s the |
|00001590| 74 68 65 20 20 6e 75 6d | 62 65 72 20 20 6f 66 20 |the num|ber of |
|000015a0| 20 73 69 67 6e 69 66 69 | 63 61 6e 74 20 20 7c 0d | signifi|cant |.|
|000015b0| 20 20 20 20 20 64 69 67 | 69 74 73 20 74 68 61 74 | dig|its that|
|000015c0| 20 61 72 65 20 72 65 74 | 61 69 6e 65 64 20 77 68 | are ret|ained wh|
|000015d0| 65 6e 20 66 6c 6f 61 74 | 69 6e 67 20 76 61 6c 75 |en float|ing valu|
|000015e0| 65 73 20 61 72 65 20 20 | 63 6f 6e 76 65 72 74 65 |es are |converte|
|000015f0| 64 20 20 7c 0d 20 20 20 | 20 20 74 6f 20 20 73 74 |d |. | to st|
|00001600| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 af 27 a0 |...H..Mo|naco..'.|
|00001610| 00 00 1e 7c 01 ae 73 94 | 01 d5 7a b0 24 00 04 22 |...|..s.|..z.$.."|
|00001620| 02 0f eb 58 00 00 00 04 | 00 04 00 28 00 02 02 5b |...X....|...(...[|
|00001630| 02 00 00 28 00 02 02 5b | 02 00 ae 3d ce 3b 00 00 |...(...[|...=.;..|
|00001640| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 01 00 |........|........|
|00001650| 00 00 01 4c 00 00 00 4c | 00 00 00 32 01 ac da c8 |...L...L|...2....|
|00001660| 1e 7c 00 00 00 1c 00 32 | 00 00 4d 50 53 52 00 00 |.|.....2|..MPSR..|
|00001670| 00 0a 03 ed ff ff 00 00 | 00 00 01 b6 28 f0 00 00 |........|....(...|
+--------+-------------------------+-------------------------+--------+--------+
